﻿Public Class Provincia

    'TODO HACER PROPIEDADES

#Region "Declaraciones"
    Private cId As Integer
    Private cNombre As String
    Private cDescripcion As String
    Private cLocalidades As New Generic.List(Of Localidad)
#End Region

#Region "Constructores"
    Public Sub New()
        cId = -1
        cNombre = ""
        cDescripcion = ""
        cLocalidades = Nothing
    End Sub

    Public Sub New(ByVal pId As Integer, ByVal pNombre As String, ByVal pDescripcion As String, ByVal pLocalidades As Generic.List(Of Localidad))
        cId = pId
        cNombre = pNombre
        cDescripcion = pDescripcion
        cLocalidades = pLocalidades
    End Sub
#End Region

#Region "Propiedades"
    Public Property Id()
        Get
            Return cId
        End Get
        Set(ByVal value)
            cId = value
        End Set
    End Property

    Public Property Nombre()
        Get
            Return cNombre
        End Get
        Set(ByVal value)
            cNombre = value
        End Set
    End Property

    Public Property Descripcion()
        Get
            Return cDescripcion
        End Get
        Set(ByVal value)
            cDescripcion = value
        End Set
    End Property

    Public Property Localidades()
        Get
            Return cLocalidades
        End Get
        Set(ByVal value)
            cLocalidades = value
        End Set
    End Property

#End Region

End Class
